10 POKE 53280,15:POKE 53281,15:POKE 646,0
20 PRINT CHR$(147);CHR$(14);
30 PRINT"       [200]INWEISE [211][205] [195]OUPON [214]1.0          [146]"
40 PRINT"[205]IT DIESEM [208]ROGRAMM LASSEN SICH [195]OUPONS"
50 PRINT"FUER [203]LEINANZEIGEN IN DER [218]EITUNG"
60 PRINT"'[211]PERR[205]UELL' AUSDRUCKEN."
70 PRINT
80 PRINT"[215]ICHTIG: [211]CHREIBEN [211]IE BITTE, BEVOR [211]IE"
90 PRINT"ANFANGEN ZU ARBEITEN, [201]HRE EIGENEN [196]ATEN";
100 PRINT"IN DIE [218]EILEN 190, 200, 210, 1040 UND"
110 PRINT"1050. [211]PEICHERN [211]IE DIESE [214]ERSION AB UND";
120 PRINT"BENUTZEN [211]IE DIESE IN [218]UKUNFT."
130 PRINT:PRINT
140 PRINT"       [197]RKLAERUNG [205]ENUEPUNKTE:"
150 PRINT
160 PRINT"[ 1 ]  [196]ATEN NEU EINGEBEN:[144]"
170 PRINT
180 PRINT"[214]ERLANGT WERDEN [210]UBRIK-[206]UMMER, [197]NTSCHEI-";
190 PRINT"DUNG [194]IETE/[211]UCHE UND DER [193]NZEIGENTEXT."
200 PRINT"[193]LTE [196]ATEN WERDEN AUTOMATISCH GELOESCHT.";
210 GOSUB 830
220 PRINT CHR$(147);
230 PRINT"[ 2 ]  [196]ATEN LADEN:[144]"
240 PRINT
250 PRINT"[196]ER [196]ATEINAME WIRD EINGEGEBEN, DANN"
260 PRINT"WIRD DIE [196]ATEI GELADEN UND AUF DEM [194]ILD-";
270 PRINT"SCHIRM ANGEZEIGT. [206]ATUERLICH MUSS DIE"
280 PRINT"[196]ATEI AUF DER [196]ISKETTE VORHANDEN SEIN."
290 PRINT
300 PRINT"[ 3 ]  [196]ATEN SPEICHERN:[144]"
310 PRINT
320 PRINT"[197]IN [196]ATEINAME FUER DEN IM [210]ECHNER BE-"
330 PRINT"FINDLICHEN [212]EXT WIRD EINGEGEBEN UND DIE-";
340 PRINT"SE [196]ATEI AUF [196]ISKETTE GESPEICHERT."
350 PRINT"[199]LEICHLAUTENDE [196]ATEIEN, DIE SCHON AUF"
360 PRINT"DER [196]ISKETTE SIND, WERDEN UEBERSCHRIE-"
370 PRINT"BEN."
380 PRINT
390 PRINT"[ 4 ]  [196]ATEN ANZEIGEN:[144]"
400 PRINT
410 PRINT"[196]ER AKTUELLE [212]EXT WIRD ANGEZEIGT."
420 GOSUB 830
430 PRINT CHR$(147);
440 PRINT"[ 5 ]  [196]ATEN KORRIGIEREN:[144]"
450 PRINT
460 PRINT"[196]ER AKTUELLE [212]EXT KANN KORRIGIERT WER-"
470 PRINT"DEN (SONST NUR EINIGE [205]ALE AUF [210][197][212][213][210][206]"
480 PRINT"DRUECKEN)."
490 PRINT
500 PRINT"[ 6 ]  [196]ATEN DRUCKEN:[144]"
510 PRINT
520 PRINT"[196]ER AKTUELLE [212]EXT WIRD ALS [211]PERR[205]UELL-"
530 PRINT"[195]OUPON GEDRUCKT. [197]NTSCHEIDEN [211]IE SICH"
540 PRINT"ENTWEDER FUER EINEN [195]OUPON MIT [212]ELEFON-"
550 PRINT"NUMMER ODER MIT [193]DRESSE, ES GIBT KEIN"
560 PRINT"[197]NTRINNEN! (HIHI)
570 [153]
580 [153]"[ 7 ]  STR$IRECTORY:STOP"
590 [153]
600 [153]"STR$AS RIGHT$NHALTSVERZEICHNIS DER STR$ISKETTE WIRD";
610 [153]"AUF DEN PEEKILDSCHIRM AUSGEGEBEN."
620 [141] 830
630 [153] [199](147);
640 [153]"ATNUS DEN (null)ENUEPUNKTEN 2 (LADEN) UND 3"
650 [153]"(SPEICHERN) GELANGT MAN DURCH STR$RUCK AUF"
660 [153]"(null)VAL(null)(null)(null)(null) INS LEFT$AUPTMENUE ZURUECK."
670 [153]:[153]
680 [153]"(null)OCH EIN (null)ORT ZUM STR$RUCKER: CHR$ETESTET WUR-";
690 [153]"DE MIT DEM (null)TAR (null)LEN-20 UND EINEM (null)IESE-"
700 [153]"MANN-RIGHT$NTERFACE. (null)OMIT DUERFTE DAS (null)RO-"
710 [153]"GRAMM MIT NAHEZU JEDEM MODERNEN VALPSON-"
720 [153]"KOMPATIBLEN STR$RUCKER ZUSAMMENARBEITEN."
730 [153]"PEEKEI (null)ROBLEMEN HILFT MEISTENS SCHON, DEN"
740 [153]"STR$RUCKERKANAL IN (null)EILE 800 MIT"
750 [153]"(null)(null)VAL(null) 1,4,7 ZU OEFFNEN."
760 [153]
770 [153]
780 [153]"    (null)IEL (null)PASS!!!"
790 [161] N$:[139] N$[178]"" [167] 790
800 [153] [199](147);
810 [128]
820 :
830 [153]"       PEEKITTE EINE (null)ASTE DRUECKEN        WAIT";
840 [161] N$:[139] N$[178]"" [167] 840
850 [142]